;Seg 1 = INIT ID# 10 proc 1 of 7 (local)

0000: L0000	BRA.S	L0006
0002: L0002	SUB.L	D7,-(A6)
0004: 	SLT	(A1)
0006: L0006	MOVEA.L	A0,A4
0008: 	_HNoPurge	
000A: 	MOVEA.L	A4,A0
000C: 	_HLock	
000E: 	MOVE.L	L0002,D0
0012: 	ADDI.L	#$0002A300,D0
0018: 	CMP.L	$020C,D0
001C: 	BGT.S	L0022
001E: 	JSR	locProc2
0022: L0022	RTS	
0024: L0024	.WORD	$206F,4,$A029,$4E75	;[ o...)Nu]
002C: L002C	.WORD	$206F,4,$A02A,$4E75	;[ o...*Nu]
0034: L0034	.WORD	$202F,$C,$226F,8	;[ /.."o..]
003C: 	.WORD	$206F,4,$A02E,$4E75	;[ o....Nu]
0044: 	.WORD	$202F,4,$A122,$21C0	;[ /..."!.]
004C: 	.WORD	$220,$2008,$4E75,$2038	;[.  .Nu 8]
0054: 	.WORD	$2A6,$4E75,$206F,4	;[..Nu o..]
005C: 	.WORD	$A01B,$21C0,$220,$4E75	;[..!.. Nu]
0064: 	.WORD	$A11A,$21C0,$220,$2008	;[..!..  .]
006C: 	.WORD	$4E75,$4C44,$574D	;[NuLDWM..]

;Seg 1 = INIT ID# 10 proc 2 of 7 (local)

0000: L0072	LINK	A6,#$FEDC
0004: 	BTST	#$0002,$017B
000A: 	BEQ.S	L008A
000C: 	BTST	#$0007,$017A
0012: 	BEQ.S	L008A
0014: 	BRA	L010A
0018: L008A	JSR	locProc3
001C: 	TST.L	D0
001E: 	BEQ.S	L0096
0020: 	BRA	L010A
0024: L0096	PEA	$FFF0(A6)
0028: 	PEA	$FFEC(A6)
002C: 	JSR	locProc5
0030: 	TST.L	D0
0032: 	ADDQ.L	#8,A7
0034: 	BEQ.S	L00AE
0036: 	PEA	$0005
003A: 	BRA.S	L0100
003C: L00AE	PEA	$FFFC(A6)
0040: 	PEA	$FFF8(A6)
0044: 	PEA	$FEE6(A6)
0048: 	PEA	$FFF4(A6)
004C: 	MOVE.L	$FFF0(A6),-(A7)
0050: 	MOVE.L	$FFEC(A6),-(A7)
0054: 	JSR	locProc6
0058: 	TST.L	D0
005A: 	LEA	$0018(A7),A7
005E: 	BEQ.S	L00D8
0060: 	PEA	$000F
0064: 	BRA.S	L0100
0066: L00D8	MOVE.L	$FFFC(A6),-(A7)
006A: 	MOVE.L	$FFF8(A6),-(A7)
006E: 	PEA	$FEE6(A6)
0072: 	MOVE.L	$FFF4(A6),-(A7)
0076: 	MOVE.L	$FFF0(A6),-(A7)
007A: 	MOVE.L	$FFEC(A6),-(A7)
007E: 	JSR	locProc4
0082: 	TST.L	D0
0084: 	LEA	$0018(A7),A7
0088: 	BEQ.S	L010A
008A: 	PEA	$0014
008E: L0100	JSR	locProc7
0092: 	MOVEQ	$00,D0
0094: 	ADDQ.L	#4,A7
0096: 	BRA.S	L010C
0098: L010A	MOVEQ	$00,D0
009A: L010C	UNLK	A6
009C: 	RTS	
009E: L0110	.WORD	$48E7,$3000,$242F,$C	;[H.0.$/..]
00A6: 	.WORD	$4EBA,$FF4A,$2600,$4EBA	;[N..J&.N.]
00AE: 	.WORD	$FF32,$2F00,$4EBA,$FF32	;[.2/.N..2]
00B6: 	.WORD	$2F02,$4EBA,$FF18,$2400	;[/.N...$.]
00BE: 	.WORD	$2F03,$4EBA,$FF24,$4FEF	;[/.N..$O.]
00C6: 	.WORD	$C,$2002,$4CDF,$C	;[.. .L...]
00CE: 	.WORD	$4E75	;[Nu......]

;Seg 1 = INIT ID# 10 proc 3 of 7 (local)

0000: L0142	MOVEA.L	$011C,A0
0004: 	LEA	$00B0(A0),A0
0008: 	TST.L	(A0)
000A: 	BNE.S	L0152
000C: 	MOVEQ	$00,D0
000E: 	BRA.S	L0154
0010: L0152	MOVEQ	$01,D0
0012: L0154	RTS	

;Seg 1 = INIT ID# 10 proc 4 of 7 (local)

0000: L0156	MOVEM.L	D2-D3/A2-A4,-(A7)
0004: 	MOVEA.L	$0018(A7),A3
0008: 	MOVE.L	$001C(A7),D0
000C: 	MOVEA.L	$0020(A7),A2
0010: 	MOVEA.L	A2,A0
0012: 	LEA	$011E(A0),A0
0016: 	CMP.L	A0,D0
0018: 	BCC.S	L0176
001A: 	MOVEQ	$02,D0
001C: 	BRA	L0248
0020: L0176	PEA	$0028
0024: 	JSR	L0110
0028: 	MOVE.L	D0,D2
002A: 	PEA	$0008
002E: 	JSR	L0110
0032: 	MOVE.L	D0,D3
0034: 	MOVE.L	D2,-(A7)
0036: 	JSR	L0024
003A: 	MOVE.L	D3,-(A7)
003C: 	JSR	L0024
0040: 	MOVEA.L	D2,A4
0042: 	MOVE.L	(A4),D1
0044: 	MOVEA.L	D3,A4
0046: 	MOVE.L	(A4),D0
0048: 	MOVEA.L	D0,A4
004A: 	MOVE.L	A2,$0004(A4)
004E: 	CLR.L	(A2)
0050: 	MOVEA.L	$0034(A7),A0
0054: 	LEA	$0008(A2),A1
0058: 	MOVE.W	(A0)+,(A1)+
005A: 	MOVE.W	(A0)+,(A1)+
005C: 	MOVE.W	(A0)+,(A1)+
005E: 	MOVE.L	$0038(A7),$0012(A2)
0064: 	MOVE.L	$003C(A7),$0016(A2)
006A: 	MOVEA.L	D0,A4
006C: 	CLR.L	(A4)
006E: 	MOVEA.L	A3,A0
0070: 	MOVEA.L	D1,A4
0072: 	MOVE.L	A3,(A4)
0074: 	MOVE.W	(A0),D0
0076: 	EXT.L	D0
0078: 	ANDI.L	#$0000FF00,D0
007E: 	MOVEA.L	D1,A4
0080: 	MOVE.W	D0,$0004(A4)
0084: 	MOVEA.L	D1,A4
0086: 	ORI.W	#$0020,$0004(A4)
008C: 	MOVEA.L	D1,A4
008E: 	CLR.W	$0006(A4)
0092: 	MOVEA.L	D1,A4
0094: 	CLR.L	$0008(A4)
0098: 	MOVEA.L	D1,A4
009A: 	CLR.L	$000C(A4)
009E: 	MOVEA.L	D1,A4
00A0: 	CLR.L	$0010(A4)
00A4: 	MOVEA.L	D1,A4
00A6: 	MOVE.L	D3,$0014(A4)
00AA: 	MOVEA.L	D1,A4
00AC: 	MOVE.W	#$FFD3,$0018(A4)
00B2: 	MOVEA.L	D1,A4
00B4: 	CLR.L	$001A(A4)
00B8: 	MOVEA.L	D1,A4
00BA: 	CLR.L	$001E(A4)
00BE: 	MOVEA.L	D1,A4
00C0: 	MOVE.W	$0002(A0),$0022(A4)
00C6: 	MOVEA.L	D1,A4
00C8: 	MOVE.W	$0004(A0),$0024(A4)
00CE: 	MOVEA.L	D1,A4
00D0: 	MOVE.W	$0006(A0),$0026(A4)
00D6: 	MOVEA.L	$011C,A0
00DA: 	LEA	$00B0(A0),A0
00DE: 	MOVE.L	D2,(A0)
00E0: 	MOVE.L	D2,-(A7)
00E2: 	JSR	L002C
00E6: 	MOVE.L	D3,-(A7)
00E8: 	JSR	L002C
00EC: 	MOVEQ	$00,D0
00EE: 	LEA	$0018(A7),A7
00F2: L0248	MOVEM.L	(A7)+,D2-D3/A2-A4
00F6: 	RTS	

;Seg 1 = INIT ID# 10 proc 5 of 7 (local)

0000: L024E	MOVEA.L	$0004(A7),A0
0004: 	MOVEA.L	$0008(A7),A1
0008: 	MOVE.L	$0108,D1
000C: 	ASR.L	#$0001,D1
000E: 	ADDI.L	#$00000400,D1
0014: 	MOVE.L	$010C,D0
0018: 	SUBI.L	#$00003C00,D0
001E: 	CMP.L	D0,D1
0020: 	BLT.S	L0274
0022: 	MOVEQ	$01,D1
0024: 	BRA.S	L0298
0026: L0274	MOVE.L	$010C,(A1)
002A: 	SUBI.L	#$00003C00,$010C
0032: 	MOVE.L	$010C,D1
0036: 	MOVEQ	$FC,D0
0038: 	AND.L	D0,D1
003A: 	MOVE.L	D1,$010C
003E: 	MOVE.L	$010C,D1
0042: 	MOVEQ	$10,D0
0044: 	ADD.L	D0,D1
0046: 	MOVE.L	D1,(A0)
0048: 	MOVEQ	$00,D1
004A: L0298	MOVE.L	D1,D0
004C: 	RTS	

;Seg 1 = INIT ID# 10 proc 6 of 7 (local)

0000: L029C	MOVEM.L	D2-D4/A2-A3,-(A7)
0004: 	MOVE.L	$0018(A7),D3
0008: 	MOVE.L	$001C(A7),D4
000C: 	MOVEA.L	$0020(A7),A2
0010: 	SUBQ.L	#4,A7
0012: 	MOVE.L	#$6174706C,-(A7)	;'atpl'
0018: 	MOVE.W	#$0080,-(A7)
001C: 	_GetResource	
001E: 	MOVE.L	(A7)+,D0
0020: 	MOVEA.L	D0,A3
0022: 	SUBQ.L	#2,A7
0024: 	_ResError	
0026: 	MOVE.W	(A7)+,D0
0028: 	EXT.L	D0
002A: 	MOVE.W	D0,D0
002C: 	BEQ.S	L02D0
002E: 	MOVEQ	$09,D0
0030: 	BRA	L0392
0034: L02D0	MOVE.L	A3,-(A7)
0036: 	JSR	L0024
003A: 	SUBQ.L	#4,A7
003C: 	MOVE.L	A3,-(A7)
003E: 	_SizeRsrc	
0040: 	MOVE.L	(A7)+,D0
0042: 	MOVE.L	D0,D2
0044: 	ADDQ.L	#4,A7
0046: 	BLT	L02EE
004A: 	MOVE.L	D2,D0
004C: 	ADD.L	D3,D0
004E: 	CMP.L	D0,D4
0050: 	BCC.S	L02F4
0052: L02EE	MOVEQ	$01,D0
0054: 	BRA	L0392
0058: L02F4	MOVE.L	D2,-(A7)
005A: 	MOVE.L	D3,-(A7)
005C: 	MOVE.L	(A3),-(A7)
005E: 	JSR	L0034
0062: 	MOVE.L	D2,D0
0064: 	ADDQ.L	#4,D0
0066: 	MOVEQ	$FE,D1
0068: 	AND.L	D1,D0
006A: 	MOVE.L	D0,D2
006C: 	ADD.L	D2,D3
006E: 	MOVE.L	A3,-(A7)
0070: 	JSR	L002C
0074: 	MOVE.L	A3,-(A7)
0076: 	_ReleaseResource	
0078: 	SUBQ.L	#4,A7
007A: 	MOVE.L	#$44415441,-(A7)	;'DATA'
0080: 	MOVE.W	#$F05F,-(A7)
0084: 	_GetResource	
0086: 	MOVE.L	(A7)+,D0
0088: 	MOVEA.L	D0,A3
008A: 	SUBQ.L	#2,A7
008C: 	_ResError	
008E: 	MOVE.W	(A7)+,D0
0090: 	EXT.L	D0
0092: 	MOVE.W	D0,D0
0094: 	LEA	$0010(A7),A7
0098: 	BEQ.S	L033A
009A: 	MOVEQ	$06,D0
009C: 	BRA.S	L0392
009E: L033A	MOVE.L	A3,-(A7)
00A0: 	JSR	L0024
00A4: 	SUBQ.L	#4,A7
00A6: 	MOVE.L	A3,-(A7)
00A8: 	_SizeRsrc	
00AA: 	MOVE.L	(A7)+,D0
00AC: 	MOVE.L	D0,D2
00AE: 	MOVEA.L	$002C(A7),A0
00B2: 	MOVE.L	D3,(A0)
00B4: 	MOVEA.L	$0030(A7),A0
00B8: 	MOVE.L	D2,(A0)
00BA: 	TST.L	D2
00BC: 	ADDQ.L	#4,A7
00BE: 	BLT	L0366
00C2: 	MOVE.L	D2,D0
00C4: 	ADD.L	D3,D0
00C6: 	CMP.L	D0,D4
00C8: 	BCC.S	L036A
00CA: L0366	MOVEQ	$07,D0
00CC: 	BRA.S	L0392
00CE: L036A	MOVE.L	D2,-(A7)
00D0: 	MOVE.L	D3,-(A7)
00D2: 	MOVE.L	(A3),-(A7)
00D4: 	JSR	L0034
00D8: 	MOVE.L	D2,D0
00DA: 	ADDQ.L	#4,D0
00DC: 	MOVEQ	$FE,D1
00DE: 	AND.L	D1,D0
00E0: 	MOVE.L	D0,D2
00E2: 	ADD.L	D2,D3
00E4: 	MOVE.L	A3,-(A7)
00E6: 	JSR	L002C
00EA: 	MOVE.L	A3,-(A7)
00EC: 	_ReleaseResource	
00EE: 	MOVE.L	D3,(A2)
00F0: 	MOVEQ	$00,D0
00F2: 	LEA	$0010(A7),A7
00F6: L0392	MOVEM.L	(A7)+,D2-D4/A2-A3
00FA: 	RTS	

;Seg 1 = INIT ID# 10 proc 7 of 7 (local)

0000: L0398	LINK	A6,#$FFE0
0004: 	MOVEM.L	D2-D4,-(A7)
0008: 	MOVE.L	$0008(A6),D2
000C: 	MOVEQ	$09,D4
000E: 	MOVE.B	#$24,$FFE3(A6)	;'$'
0014: 	BRA.S	L03DE
0016: L03AE	MOVE.W	D2,D1
0018: 	ANDI.W	#$000F,D1
001C: 	MOVE.W	D1,D0
001E: 	CMPI.W	#$0009,D0
0022: 	BLE.S	L03C8
0024: 	MOVE.W	D4,D1
0026: 	SUBQ.W	#1,D4
0028: 	MOVE.W	D1,D3
002A: 	EXT.L	D0
002C: 	MOVEQ	$37,D1
002E: 	BRA.S	L03D2
0030: L03C8	MOVE.W	D4,D1
0032: 	SUBQ.W	#1,D4
0034: 	MOVE.W	D1,D3
0036: 	EXT.L	D0
0038: 	MOVEQ	$30,D1
003A: L03D2	ADD.L	D1,D0
003C: 	MOVE.B	D0,$E2(A6,D3.W)
0040: 	MOVE.L	D2,D0
0042: 	ASR.L	#$0004,D0
0044: 	MOVE.L	D0,D2
0046: L03DE	CMPI.W	#$0001,D4
004A: 	BGT	L03AE
004E: 	MOVE.B	#$09,$FFE2(A6)
0054: 	PEA	$FFE2(A6)
0058: 	UNKNOWN	
005A: 	MOVEM.L	$FFD4(A6),D2-D4
0060: 	UNLK	A6
0062: 	RTS